home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Taifun
/
Taifun 080 (1988-11-15)(Ossowski, Stefan)(DE)(PD).zip
/
Taifun 080 (1988-11-15)(Ossowski, Stefan)(DE)(PD).adf
/
c
/
Taifun80.mod
< prev
next >
Wrap
Text File
|
1988-08-14
|
820b
|
43 lines
MODULE TAIFUN80;
FROM InOut IMPORT Write,WriteLn,WriteString,WriteInt,WriteCard;
VAR W : CARDINAL;
BEGIN
WriteLn;
WriteLn;
W := 1;
FOR W:= 0 TO 153 DO
Write("!");
END (* FOR *);
FOR W:= 1 TO 80 DO
WriteCard(W,6);
END (* FOR *);
WriteLn;
WriteLn;
WriteString(" TAIFUN Disk's gibt es bisher!!!!!!!!!!!!!!!");
WriteLn;
WriteString(" Alle TAIFUN's und viele andere Public-Domain-Disketten");
WriteLn;
WriteString(" können Sie bestellen beim PD - Versand:");
WriteLn;
WriteString(" Stefan Ossowski");
WriteLn;
WriteString(" Veronikastraße 33");
WriteLn;
WriteString(" 4300 Essen 1");
WriteLn;
WriteString(" Telefon: 0201/788778");
WriteLn; WriteLn;
FOR W:= 0 TO 153 DO
Write("¡");
END;
WriteLn; WriteLn;
END TAIFUN80 .